home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / C / Utilities / DVIM72-Mac 1.9.6 / source / TCTOS.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-09-14  |  881 b   |  29 lines  |  [TEXT/R*ch]
  1. /* -*-C-*- tctos.h */
  2. /*-->tctos*/
  3. #include "dvihead.h"
  4. #include "gendefs.h"
  5. #include "egblvars.h"
  6. #include <string.h>
  7. #include <stdio.h>
  8. /**********************************************************************/
  9. /****************************  tctos  *********************************/
  10. /**********************************************************************/
  11.  
  12. char *tctos( void );
  13.  
  14. char *
  15. tctos()    /* return pointer to (static) TeX page counter string */
  16. {    /* (trailing zero counters are not printed) */
  17.     register INT16 k;    /* loop index */
  18.     register INT16 n;    /* number of counters to print */
  19.     static char s[111];    /* 10 32-bit counters n.n.n... */
  20.  
  21.     for (n = 9; (n > 0) && (tex_counter[n] == 0); --n)
  22.     /* NO-OP */;
  23.     s[0] = '\0';
  24.     for (k = 0; k <= n; ++k)
  25.     (void)sprintf(strrchr(s,'\0'),"%ld%s",
  26.         tex_counter[k],(k < n) ? "." : "");
  27.     return ((char *)&s[0]);
  28. }
  29.